home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / graphics.17 / graphics / graphics-0.17 / tek2plot / putshort.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-03-12  |  1.3 KB  |  46 lines
  1. /* Copyright (C) 1989 Free Software Foundation, Inc.
  2.  
  3.    plot is distributed in the hope that it will be useful, but WITHOUT
  4.    ANY WARRANTY.  No author or distributor accepts responsibility to
  5.    anyone for the consequences of using it or for whether it serves any
  6.    particular purpose or works at all, unless he says so in writing.
  7.    Refer to the GNU General Public License for full details.
  8.  
  9.    Everyone is granted permission to copy, modify and redistribute
  10.    plot, but only under the conditions described in the GNU General
  11.    Public License.  A copy of this license is supposed to have been
  12.    given to you along with libtek so you can know your rights and
  13.    responsibilities.  It should be in a file named COPYING.  Among
  14.    other things, the copyright notice and this notice must be preserved
  15.    on all copies.  */
  16.  
  17.  
  18. int output_high_byte_first = 0;
  19.  
  20. /* This file is the putshort routine, which takes an integer argument
  21.    and writes out the bottom two bytes, high byte first. */
  22.  
  23. #include "sys-defines.h"
  24. #include "libplot.h"
  25.  
  26. void
  27. putshort ( x)
  28.      int x;
  29. {
  30.   if (output_high_byte_first == 1)
  31.     {
  32.       putchar ((x>>8) & 0xFF);
  33.       putchar (x & 0xFF);
  34.     }
  35.   else if (output_high_byte_first == -1)
  36.     {
  37.       putchar (x & 0xFF);
  38.       putchar ((x>>8) & 0xFF);
  39.     }
  40.   else
  41.     {
  42.       short i = x;
  43.       fwrite (&i, sizeof(i), 1, stdout);
  44.     }
  45. }
  46.